
Private Sub OptionButton1_Click()

With Sheets("Infos_OP").Range("A2")
    .Value = "Fichier en taux - Rception Masque"
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlCenter
End With

Unload Me

End Sub

Private Sub OptionButton2_Click()

With Sheets("Infos_OP").Range("A2")
    .Value = "Fichier en taux - Rception par Fichier"
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlCenter
End With

Unload Me

End Sub

Private Sub OptionButton3_Click()

With Sheets("Infos_OP").Range("A2")
    .Value = "Fichier en taux - Rception par Courrier"
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlCenter
End With

Unload Me

End Sub

Private Sub OptionButton4_Click()

With Sheets("Infos_OP").Range("A2")
    .Value = "Fichier en taux - Rception par Dmat"
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlCenter
End With

Unload Me

End Sub

Private Sub OptionButton5_Click()

With Sheets("Infos_OP").Range("A2")
    .Value = "Fichier en taux - Flux Auto - Rception par Fichier"
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlCenter
End With

Unload Me

End Sub

Private Sub OptionButton6_Click()

With Sheets("Infos_OP").Range("A2")
    .Value = "Suivi particulier "
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlCenter
End With

Unload Me

End Sub

Private Sub UserForm_Click()

End Sub